# -*- mode: snippet; require-final-newline: nil -*-
# name: readxlsx using XLConnect
# key: readxlsx@XLConnect
# contributor : Shuguang Sun
# --
wb <- XLConnect::loadWorkbook("$0")
XLConnect::setMissingValue(wb, value = c("NA"))
dat <- XLConnect::readWorksheet(wb, sheet = 1)
